Nuprl Lemma : eq_atom_eq_true_elim_sqequal 12,41

x, y:Atom. (x =a y ~ tt)  (x = y) 
latex


ProofTree


Definitionst  T, x:A. B(x), P  Q, , P & Q, P  Q
Lemmasatom sq, btrue wf, assert of eq atom, eqtt to assert, assert wf, bool wf, iff transitivity

origin